home *** CD-ROM | disk | FTP | other *** search
/ You're the Director / You're The Director.iso / pc / macf / mger.dir / 00366.ls < prev    next >
Encoding:
Text File  |  1995-10-10  |  517 b   |  29 lines
  1. on enterFrame
  2.   global gCurrentSprite
  3.   set the keyDownScript to "if the key = RETURN then RunOff"
  4.   if length(field "name") > 15 then
  5.     set gCurrentSprite to 3
  6.     RunOff()
  7.   end if
  8.   if length(field "movie") > 15 then
  9.     set gCurrentSprite to 4
  10.     RunOff()
  11.   end if
  12. end
  13.  
  14. on mouseDown
  15.   global gCurrentSprite
  16.   if rollOver(3) then
  17.     set gCurrentSprite to 3
  18.   else
  19.     if rollOver(4) then
  20.       set gCurrentSprite to 4
  21.     end if
  22.   end if
  23. end
  24.  
  25. on exitFrame
  26.   global gStart, gCurrentSprite
  27.   set gStart to 1
  28. end
  29.